home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Amiga Format CD 36
/
Amiga Format CD36 (1999-01-22)(Future Publishing)(GB)[!][issue 1999-02].iso
/
-seriously_amiga-
/
misc
/
guides
/
devguide
/
checkyourdevices
< prev
next >
Wrap
Text File
|
1998-12-07
|
2KB
|
68 lines
; CheckYourDevs V2.01
; © 10/1998 by Michaela Prüß & Heiko Schröder
; 2.01 keine Auflistung von ~(#?.info|#?.bak|#?.readme|#?.sig)
Echo "
Device-Check at your system
*NV2.01 © Michaela Prüß & Heiko Schröder 11/98"
Echo "*NThe report will be written in RAM: and you can't stop the version scan!"
Ask "Do you want to check your system devices? (Y/N)"
If NOT WARN=5
Echo "
CANCEL ...
"
C:Quit
EndIf
C:FailAt 100
C:Copy DVC RAM:
C:Copy C:Search RAM:
C:Copy Scripts/DeviceList.dvc RAM:
C:Copy MyCheck RAM:
C:Copy MyCheck.rexx RAM:
C:Copy MyConvert.rexx RAM:
Echo "List of all your devices*N--------------------------*N" >Ram:Dev-List
Echo "List of your old devices*N--------------------------*N" >Ram:Dev-OldList
Echo "List of new devices*NPlease contact me: age@thepentagon.com*Nand send this file to me. Thanks.*N--------------------------" >Ram:Dev-NewList
Echo "For DevGuide I scan infos about your system:" >>Ram:Dev-NewList
Version >>Ram:Dev-NewList
C:CPU >>Ram:Dev-NewList
Echo "Starting Rexx"
Sys:System/RexxMast >NIL:
Echo "Looking for Sys:Devs/#?.device"
C:List Sys:Devs/ PAT=#?.device~(#?info|#?bak|#?readme|#?sig) ALL quick nohead LFormat="Execute MyCheck %s%s" >Ram:List1
Sort Ram:List1 Ram:List1
Echo "Starting Check..."
Protect MyCheck +s
Execute Ram:List1
Echo "*N*NREADY!*NThe result can be found at Ram:Dev-OldList and Ram:Dev-NewList ..."
Echo "Please send me the RAM:Dev-NewList for updating the Device.guide.*N"
Delete Ram:List1 QUIET
Delete Ram:DVC QUIET
Delete Ram:Search QUIET
Delete Ram:DeviceList.dvc QUIET
Delete Ram:MyCheck QUIET
Delete Ram:MyCheck.rexx QUIET
Delete Ram:MyConvert.rexx QUIET
Ask "Please press ENTER for next Step."
C:CLS
; Device Online Update Generating Script
Echo "
Device Library Update Form Generator 1.0
*N© 10/98 by Heiko Schröder*N"
Ask "Next Step... *NDo you want to create a Form for updating devices online at http://www.amigasystem.org? (Y/N)"
If NOT WARN=5
Echo "
CANCEL ...
"
Delete Ram:Dev-OnlineUpdate QUIET
C:Quit
EndIf
Echo "Generating Form..."
rx MyOnlineUpdate.rexx
Delete Ram:Dev-OnlineUpdate QUIET
Echo "Ready.
Please load RAM:Dev-OnlineUpdate.html in your browser and follow the instructions.
"
Ask "*NPress ENTER to end..."
Wait 2 secs